home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 31 / 031.d81 / hello connect (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  438b  |  11 lines
  1. 1 poke51201,0:poke927,0:poke1023,0:poke53281,.:poke53280,.
  2. 2 poke55,.:poke56,160:clr:gosub20:c$=chr$(34):poke808,237
  3. 7 poke646,peek(53281):print"l[207]"c$"pre*"c$",8"
  4. 8 print"run";
  5. 10 poke631,13:poke632,13:poke198,2:end
  6. 20 print"[147]     [152][172][155][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][152][187]"
  7. 30 print"     [161][146] [199]oing to [204]oadstar [205]enu ... [152][161]"
  8. 40 print"[156][163][163][163][163][163][152][188][155][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][146][152][190][156][163][163][163][163][163]";
  9. 45 l$="[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]"
  10. 50 print"[154]"l$:print""l$:print"[158]"l$:print"[129]"l$:print""l$"";:return
  11.